plot[(z*110- 110*10)/((110-10)*z), {z, 0, 100}]